home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The X-Philes (2nd Revision)
/
The X-Philes Number 1 (1995).iso
/
xphiles
/
hp48_2
/
hstack_c
< prev
next >
Wrap
Internet Message Format
|
1995-03-31
|
6KB
From: Conrad Winchester <CW%APG.PH.UCL.AC.UK@VTVM2.CC.VT.EDU>
Subject: v03i013: hstack_cw - HSTACK v1.1 a hyperstack of sorts, Part01/01
Newsgroups: comp.sources.hp48
Followup-To: comp.sys.hp48
Approved: spell@seq.uncwil.edu
Checksum: 2206998397 (verify with brik -cv)
Submitted-by: Conrad Winchester <CW%APG.PH.UCL.AC.UK@VTVM2.CC.VT.EDU>
Posting-number: Volume 3, Issue 13
Archive-name: hstack_cw/part01
BEGIN_DOC hstack_cw.doc
Howdy folks,
It's abolutely ages since I have posted anything so I hope
this will be appreciated. This program works as a complete unit
but I hope people will suggest improvements. It is unashamedly
based on STK7 by David Crisp ( I hope I got that right ). It
is infact STK7 with enhancements. They are
1) If mult-line display is enabled then more than just
the first line can have a multi-line display....
Try 3 [MTH] [MATR] IDN ENTER
and you will see what I mean. I think this is fairly
useful, please let me know what you think.
2) The system flage TRUE and FALSE show up as |T| and
|F| rather than External so that they can be told apart.
Try #3AC0h SYSEVAL !
3) It is installed as Library 900 (I hope this number's notin use
,I did look at the list).
I decided to do 1 because more lines were available for display.
I decided to do 2 because when I'm hacking and things go wrong
the name External doesn't help much.
I did three because I wanted to modularize it without leaving too
much open to the casual user.
The ASC form of LIB HSTACK: hyper-stack V1.1 is listed below.
I have no other way of encodeing it so could some kind soul see
that the uuencoded bits get added thankyou. Now to be more
philisophical.
Both Disp5 and Stk7 made me realize that what I have been calling
the stack is infact only a graphical representation ofthe stack.
"The menu is not the meal" "The map is not the territory" etc...
These programs (once you've picked them apart for hours finding
out how they work) actually provide a framework for ANY DISPLAY
you want whilst the main bits of the program get on with the
housework looking after the actual stack in memory.
So I have a request :-
If any bright young (actually thats not totally necessary)
iconic grob designers can come up with small (i.e. to fit on
or nearly fit on one level of the stack) icons to represent
the different object on the stack they will be incorporated
into a sort of GUI for the 48sx. Now wouldn't that be nice!
Anyway I have to trundle, I'll let the code speak for itself...
Conrad Winchester the last.
P.S. This version can be freely distributed as long as no money is involved
but please keep a mention of my name and David Crisp's somewhere about it.
P.P.S. As usual use this program at your own risk
END_DOC
BEGIN_ASC hstack_cw.asc
%%HP: T(1)A(D)F(.);
"04B2067500818435451434B4A30284970756270235471636B6026513E2138148
31C4000000049400C00008483100D9D20E1632041A1339202000000000000090
8441293632B21308483200D9D20F6F93DBC36A652676E263C370F2815DCC26A6
52679144D9D2088130DA91629E2048330065F93DA916D9D2029E20483300B213
02C230F0E93DA91629E204833000BF933991629E2048330062726D9D20FEF303
22309E55032230F30403C3700831687E93C121698E36D9D20E52168D761FE226
B213032F934C0168B736CAF06D1236CB916F0046D443685230CA1300ED305304
0D9E36D9D209BC26A6526E93303C370F28153F2162C230942700ED3012270CBD
30FED30924214337044230B2130D9D2008316D2E30E9330E6230DCC26A65262E
23018A3029E20483300B2130B2130B2130348155A37044230B21308483300D9D
20D9D202C23018A30E2B30F1916D9D208D761F80406765439150C2A20B0000C7
45C739150B21302C2300CA30E2B30F1916D9D208D761F80406765439150C2A20
B0000C764C739150B21308DA162ED938D761B213032230924219FF30B2130848
3400D9D20D41319BF8309A3539916D9D20BEF839659339916B85935562188A36
9404042D4608B46F291132230CF14697611B2130B85932DF93E5E4029E204832
008BE40D9D20803816EC406981629E2048340028E4678D40809831CF9329E204
832002DF93B2130BEF832DF83B21308483000D9D20E1A81B1140557352A1709C
B04F6683D9D2014F83D9D20204242FA309BF83CB92629E204834005A493B2130
A5F83D00A337F83AC1A344193B2130C3024E5E40454048BE40D9D20827835409
3B2130B1140877358C170CA031B2130E4A20E1000C3FFFE6BFF3ABFF58DFF74E
FFE4A20070000000000000000000000000000C30000000000000000000000000
000000000000000000000000000061000608435451434B400011000F15E6C73"
END_ASC
BYTES: #37C6h 712
BEGIN_UU hstack_cw.uue
begin 644 hstack.lib
M2%!(4#0X+45`*V!7`!A(4U1!0TLZ($AY<&5R(%-T86-K(%8Q+C$8A!-,````8
M0$D`#`"`A!,`G2W@82-`H3&3`@(````````)2!228R,K,8"$(P"=+?#V.;T\L
MIE9B9RXV/`<O&-7,8FHE=AE$G2V`&`.M&2;I`H0S`%:?TYIAG2T@Z0*$,P`K\
M,2`L`P^>TYIADBY`.`,`^SF3&2;I`H0S`"8GUMD"[S\P(@/I53`B`S]`,#P':
M@!.&YSD<$I;H8YTMX"5AV&?Q+F(K,3#R.<00AGMCK`_6(6.\&?8`9$TTAB4#=
MK#$`W@,U0-#I8YTMD,MB:B7F.0/#<_""4?,2)BP#27(`W@,A<L#;`^\]D$(2/
M-'-`)`,K,=#9`H`3UN(#GC/@)@/-+*968N(R$*@#DBY`.`.P$@,K,;`2`T,8Y
M53H'1#*P$@-(.`/0V0*=+2`L`X$ZX+(#'QG6V0+89_$(!'96-!D%+"JP``!\9
M5'R34;`2`\(R`*P#+COPD6&=+8!]%H]`8&=%DU'`H@(+`,!GQ#<9!2LQ@*UA2
MXIV#?18K,3`B`RDDD?\#*S&`A$,`G2W0%!.YCP.I4Y,9UMD"ZX^35CF3&;985
M.54F@:AC24!`TF2`2_:2$2,RP!]D>1:Q$@.+E2/].5Y.(.D"A",`N$[0V0((S
M@V'.!)88)ND"A$,`@DYVV`0(B1/\.9(N0#@"(/TY*S&P_CC2C[,2`T@X`-#9#
M`AZ*L1$$53<E&@?)"_1F.)TM$/0XG2T@0$+R.I#[.+PI)ND"A$,`I92S$@-:1
MC],`.G./HQPZ1)&S$@,\(.3E!%0$A.L$G2V`<CA%D+,2`QM!@'=3R''`"A,KX
M,>"D`AX`P//_;OL_NO^%_7_D_TXJ``<`````````````````P`,`````````Q
C`````````````````````````!8`8(`T114TM`0`$0#P40[PJ
``
end
END_UU